//=========================================================================
// d¾
//	callfunc "KafraMain",Speech,SelectNum,"OutSave",OutX,OutY,"InSave",InX,InY,
//				Storage,Cart,MapCodeArray,PriceArray;
//  ѼƪԱ
//	Speech -> y[
//			0: ݭ3
//			1: ݭ4
//			2: J]q
//			3: SΡAS
//			4: b㭵ùJB㭵]Ŷʿܮɡ^
//	SelectNum -> AȤ7Ӽѡ]0x7f7ӥѤW^
//			+1:  mxs
//			+2:  ܮw
//			+4:  Ŷ
//			+8:  
//			+16: dIƲֿnT{
//			+32: dԪAȤHmG
//			+64: 
//			+128: dԻȦ	//=====Add by FPE(2008.2.12)=====
//	"OutSave",OutX,OutY -> uxsb~vxsI
//	                        X{oӿﶵɭԾA
//	"InSave",InX,InY    -> uxsb̡vxsI
//	                        SﶵɡA"InSave""NULL"
//	                        pGSxsAȡAh
//	Storage -> ܮwO
//	Cart -> ΤO
//	MapCodeArray -> xsFŶʪAȪMAPNXƲܶq
//	PriceArray -> xsFOΪƲܶq
//
//  ŶMAPNX
//	1	w
//	2	̴|o
//	3	N
//	4	
//	5	ùJ
//	6	R
//	7	F ~H
//	8	㺸
//	9	ǥ oq}
//	10	J]q
//	11	oִ Oq
//	12	J]qoִ Oq]11LܦW^
//	13	׿
//	14	wԡ]|^
//	15	N]|^
//	16	]|^
//	17	㺸]|^
//	18	1
//	19	2
//	20	3
//
//  parseBz
//	udԪAȤHmGvɭԥ[WviewpointAcutin
//	Spend]S]iH^
//
//  ıoä[ܶq
//	KAFRA_PIT -> dI
//-------------------------------------------------------------------------

function	script	KafraMain	{
	//ݭԳ
	function KafraSpeech {
		if(getarg(0)!=3) {
			mes "[d¾]";
			mes "w{C";
			mes "dԤqHɬz̪AȡC";
			switch(getarg(0)) {
			case 0:
				break;
			case 1:
			case 4:	//case4Ab㭵ùJB㭵
				mes "ݭnAȶܡH";
				break;
			case 2:	//J]q
				mes "dԪAȦ賡䳡A";
				mes "ѩAȭp}A";
				mes "|ѧ󰪽qAȡC";
				break;
			}
			next;
		}
		return;
	}

	//mxsA
	function KafraSave {
		if(getarg(5) == "NULL")
			savepoint getarg(2),getarg(3),getarg(4);	//SOutSave
		else if(select("xsb~","xsb")==1)
			savepoint getarg(2),getarg(3),getarg(4);	//OutSave
		else
			savepoint getarg(5),getarg(6),getarg(7);	//InSave
		mes "[d¾]";
		mes "wgxsnFC";
		mes "±zϥΡC";
		return;
	}

	//ŶʪA
	function KafraTrans {
		if(getarg(0)==4) {	//b㭵ùJB㭵
			mes "[d¾]";
			mes "ھڥdԪAȪ׵o@MꥻM׵o@Mwu^FF0000ŶʪAȭ^000000vA";
			mes "ѶǰeAȡC";
			next;
			mes "[d¾]";
			mes "nqLaɡA";
			mes "ШϥέŸC";
			return;
		}
		copyarray '@price,getarg(11),getarraysize(getarg(11));	//i}PriceArray
		//setarrayul
		if('placename$[0] == "") {
			setarray 'placename$,	"c-̼w[  w","ìP ̴|oq","]k N","s ","Fz ùJ","f R",
						"F ~H","Be 㺸","ǥ oq}","䤧 J]q","oִ Oq",
						"J]qoִ Oq","׵o @M  ׿","c-̼w[  w","]k N","s ","Be 㺸",
						"1","2","3";
		}
		for(set '@i,0; '@i<getarraysize('@price); set '@i,'@i+1)
			set '@place$['@i],'placename$[ getelementofarray(getarg(10),'@i)-1 ] +" -> "+ '@price['@i] +" z";
		mes "[d¾]";
		mes "пܥتaC";
		next;
		set '@j,select(		'@place$[0],'@place$[1],'@place$[2],'@place$[3],'@place$[4],'@place$[5],'@place$[6],'@place$[7],
					'@place$[8],'@place$[9],'@place$[10],'@place$[11],'@place$[12],'@place$[13],'@place$[14],'@place$[15],
					'@place$[16],'@place$[17],'@place$[18],'@place$[19],"")-1;
		if('@j==20) {
			mes "[d¾]";
			mes "D`P¡C";
			mes "wUAӡC";
			return;
		}
		if(Zeny<'@price['@j]) {
			mes "[d¾]";
			mes "ȤHAzC";
			mes "·ЦAT{@UC";
			return;
		}
		set Zeny,Zeny-'@price['@j];
		set KAFRA_PIT,KAFRA_PIT+('@price['@j]/10);
		switch ( getelementofarray(getarg(10),'@j) ) {
			case 1: warp "prontera.gat",116,72; 	break;
			case 2: warp "izlude.gat",91,105; 	break;
			case 3: warp "geffen.gat",120,39; 	break;
			case 4: warp "payon.gat",160,58; 	break;
			case 5: warp "morocc.gat",156,46; 	break;
			case 6: warp "alberta.gat",117,56; 	break;
			case 7: warp "gef_fild10.gat",52,326; 	break;
			case 8: warp "aldebaran.gat",167,112; 	break;
			case 9: warp "mjolnir_02.gat",99,351; 	break;
			case 10: warp "comodo.gat",209,143; 	break;
			case 11:
			case 12:
				 warp "cmd_fild07.gat",127,134; break;
			case 13: warp "yuno.gat",158,124; 	break;
			//|MΥd
			case 14: warp "prontera.gat",278,211; 	break;
			case 15: warp "geffen.gat",120,39; 	break;
			case 16: warp "payon.gat",158,88; 	break;
			case 17: warp "aldebaran.gat",132,103;	break;
			//
			case 18: warp "SavePoint",0,0;		break;
			case 19: warp "SavePoint",0,0;		break;
			case 20: warp "SavePoint",0,0;		break;
		}
		end;
	}

	//A
	function KafraCart {
		if(Class!=5 && Class!=10 && Class!=18) {
			mes "[d¾]";
			mes "pC";
			mes "OӤHtCMWŪߪ̱MΪAȡC";
			return;
		}
		if(Cart) {
			mes "[d¾]";
			mes "zwgLFC";
			return;
		}
		mes "[d¾]";
		mes "ΤOάO" +getarg(9)+ "ZenyC";
		mes "FTO௲AnǷ|uϥΡvޯC";
		mes "pGSoӧޯAu|եծOC";
		mes "TwnζܡH";
		next;
		if(select("Τ","")==2) {
			mes "[d¾]";
			mes "D`P¡C";
			mes "wUAӡC";
			return;
		}
		if(Zeny<getarg(9)) {
			mes "[d¾]";
			mes "z@C";
			mes "ΤOάO"+getarg(9)+"ZenyC";
			return;
		}
		set Zeny,Zeny-getarg(9);
		setcart;
		return;
	}

	//dIƽT{
	function KafraPoint {
		mes "[d¾]";
		mes strcharinfo(0) + "A";
		mes "zIƤ@@" +KAFRA_PIT+ "IC";
		next;
		mes "[d¾]";
		mes "ҿIơA";
		mes "NOQΥdԪAȪǰeAȡA";
		mes "ӨϥΦƨӲֿnC";
		mes "ֿnIƥiHICӫ~C";
		mes "ֿnIƶVhAiIӫ~VhC";
		return;
	}

	//
	function KafraEnd {
		mes "[d¾]";
		mes "HAȩM޲z~ȬؼСA";
		mes "ڭ̥dԪAȷ|[C";
		mes "᪺l̷|ɤOUaA";
		mes "dԪA`qA";
		mes "ЦwߨϥΡC";
		return;
	}

	//=====Add by FPE(2008.2.12)=====(S)
	//dԻȦ
	function KafraBank {
		mes "[d¾]";
		mes "ÇC׬O1,000 ZenyC";
		next;
		switch(select("s","",""))
		{
		case 1:
			next;
			mes "[d¾]";
			mes "CsJ@Aڭ̱N1%OAHڭ̪AȡC";
			mes "пJsڪBG";
			next;
			input '@kafrabank;
			if('@kafrabank>=1000 && '@kafrabank<=2147483647)
			{
				set '@charge,'@kafrabank/100;
				if('@kafrabank+'@charge>zeny)	//JBӤj
				{
					mes "[d¾]";
					mes "znsڪBMza{šC";
					break;
				}
				if('@kafrabank>2147483647-#kafrabank)	//sڤӦh
				{
					mes "[d¾]";
					mes "zsڤӦhFC";
					break;
				}
				set zeny,zeny-'@kafrabank-'@charge;
				set #kafrabank,#kafrabank+'@kafrabank;
				next;
				mes "[d¾]";
				mes "OG^135445" + '@charge + "zeny^000000C";
				mes "P±zAϥΡC";
			}
			else
			{
				mes "[d¾]";
				mes "zJd򤣥TC";
			}
			break;
		case 2:
			if(#kafrabank==0)
			{
				mes "[d¾]";
				mes "zèSsڦbC";
				break;
			}

			mes "[d¾]";
			mes "zȦٳѤUG";
			mes "^135445" + #kafrabank + "^000000Zeny";
			next;
			input '@kafrabank;
			if('@kafrabank>0 && '@kafrabank<=2147483647)
			{
				if('@kafrabank>#kafrabank)	//JBӤj
				{
					mes "[d¾]";
					mes "znڪBMzȦ檺sڪBšC";
					break;
				}
				if('@kafrabank>2147483647-zeny)	//ڤӦh
				{
					mes "[d¾]";
					mes "zڤӦhFC";
					break;
				}
				set #kafrabank,#kafrabank-'@kafrabank;
				set zeny,zeny+'@kafrabank;
				next;
				mes "[d¾]";
				mes "P±zAϥΡC";
			}
			else
			{
				mes "[d¾]";
				mes "zJd򤣥TC";
			}
			break;
		case 3:
			mes "[d¾]";
			mes "P±zAϥΡC";
			break;
		}

		return;
	}
	//=====Add by FPE(2008.2.12)=====(E)

	//mainqo̶}l
	KafraSpeech getarg(0);
	setarray '@serv$,"mxsA","ܮwA","ŶʪA",
//				"A","dIƲֿnT{","dԪAȤHmG","";
				"A","dIƲֿnT{","dԪAȤHmG","","dԻȦ";	//=====Modify by FPE(2008.2.12)=====
	for(set '@i,0; '@i<7; set '@i,'@i+1) {
		if(getarg(1)&(1<<'@i) == 0)
			set '@serv$['@i],"";	//pGSSelectNumѡAh]m
	}
	if(getarg(1)&128==0) set '@serv$[7],"";	//=====Add by FPE(2008.2.12)=====
//	switch (select('@serv$[0],'@serv$[1],'@serv$[2],'@serv$[3],'@serv$[4],'@serv$[5],'@serv$[6])) {
	switch (select('@serv$[0],'@serv$[1],'@serv$[7],'@serv$[2],'@serv$[3],'@serv$[4],'@serv$[5],'@serv$[6])) {	//=====Modify by FPE(2008.2.12)=====
		case 1:
			//0,1]
			KafraSave 0,1,getarg(2),getarg(3),getarg(4),getarg(5),getarg(6),getarg(7);
			break;
		case 2:
			//ܮwAȤ
			callfunc "KafraStorage",getarg(8);
			end;
		//=====Add by FPE(2008.2.12)=====(E)
		case 3:
			KafraBank;
			break;
		//=====Add by FPE(2008.2.12)=====(E)
		//case 3:
		case 4://=====Modify by FPE(2008.2.12)=====
			//19]
			if(getarg(0) != 4)
				KafraTrans getarg(0),1,2,3,4,5,6,7,8,9,getarg(10),getarg(11);
			else
				KafraTrans getarg(0);
			break;
		//case 4:
		case 5://=====Modify by FPE(2008.2.12)=====
			//08]
			KafraCart 0,1,2,3,4,5,6,7,8,getarg(9);
			break;
		//case 5:
		case 6://=====Modify by FPE(2008.2.12)=====
			KafraPoint;
			break;
		//case 6:
		case 7://=====Modify by FPE(2008.2.12)=====
			mes "[d¾]";
			mes "paϤܤFdԪAȤHGC";
			return;	//case6returnuHmG
		//case 7:
		case 8://=====Modify by FPE(2008.2.12)=====
			KafraEnd;
			break;
	}
	close2;
	cutin "kafra_01",255;
	end;
}

//ܮwAȤ
function	script	KafraStorage	{
	//=====Add by FPE(2008.2.12)=====(S)
	if(getarg(0)!=150)	//ܵiܮwBO150CpGOܵiܡA}Ҥ|ܮw
	{
		mes "[d¾]";
		mes "пܧAnܮwG";
		next;
		if(select("ӤHܮw","|ܮw")==2)
		{
			if(basicskillcheck() && getskilllv(1)<6) {
				mes "[d¾]";
				mes "ܩpI";
				mes "zLkϥέܮwAȡA";
				mes "oݭnJobLvܤ6ťHWC";
			}
			else if(Zeny<getarg(0)) {
				mes "[d¾]";
				mes "z@C";
				mes "ܮwAȪOάO"+getarg(0)+"ZenyC";
			}
			else
			{
				set '@Result,guildopenstorage();
				if('@Result==1)
				{
					mes "[d¾]";
					mes "藍_A|ܮwwgQY|}C";
					mes "Pɥu঳@HisC";
				}
				else if('@Result==2)
				{
					mes "[d¾]";
					mes "藍_AAݩ󤽷|I";
				}
				else
					set Zeny,Zeny-getarg(0);
			}
	
			close2;
			cutin "kafra_01",255;
			return;
		}
	}
	//=====Add by FPE(2008.2.12)=====(E)

	if(basicskillcheck() && getskilllv(1)<6) {
		mes "[d¾]";
		mes "ܩpI";
		mes "zLkϥέܮwAȡA";
		mes "oݭnJobLvܤ6ťHWC";
	}
	else if(Zeny<getarg(0)) {
		mes "[d¾]";
		mes "z@C";
		mes "ܮwAȪOάO"+getarg(0)+"ZenyC";
	}
	else {
		set Zeny,Zeny-getarg(0);
		openstorage;
		cutin "kafra_01",255;
		close;
	}
	close2;
	cutin "kafra_01",255;
	return;
}

//----------------------------------
// < w -  >
//----------------------------------

prontera.gat,146,89,6	script	d¾	117,{
	cutin "kafra_01",2;
	setarray '@code,2,3,4,5,6,7;
	setarray '@price,600,1200,1200,1200,1800,1700;
//	callfunc "KafraMain",1,0x7f,"prontera.gat",116,72,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"prontera.gat",116,72,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,146,89,1,0x0000FF;
	viewpoint 1,282,200,2,0x0000FF;
	viewpoint 1,151,29,3,0x0000FF;
	viewpoint 1,29,207,4,0x0000FF;
	cutin "kafra_01",255;
	end;
}

//----------------------------------
// < w - F䪺d >
//----------------------------------

prontera.gat,282,200,2	script	d¾	114,{
	cutin "kafra_04",2;
	setarray '@code,2,3,4,5,6,7;
	setarray '@price,600,1200,1200,1200,1800,1700;
//	callfunc "KafraMain",1,0x7f,"prt_fild06.gat",33,192,"prontera.gat",279,200,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"prt_fild06.gat",33,192,"prontera.gat",279,200,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,146,89,1,0x0000FF;
	viewpoint 1,282,200,2,0x0000FF;
	viewpoint 1,151,29,3,0x0000FF;
	viewpoint 1,29,207,4,0x0000FF;
	cutin "kafra_04",255;
	end;
}

//----------------------------------
// < w - n䪺d >
//----------------------------------

prontera.gat,151,29,0	script	d¾	115,{
	cutin "kafra_03",2;
	setarray '@code,2,3,4,5,6,7;
	setarray '@price,600,1200,1200,1200,1800,1700;
//	callfunc "KafraMain",1,0x7f,"prt_fild08.gat",170,368,"prontera.gat",116,72,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"prt_fild08.gat",170,368,"prontera.gat",116,72,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,146,89,1,0x0000FF;
	viewpoint 1,282,200,2,0x0000FF;
	viewpoint 1,151,29,3,0x0000FF;
	viewpoint 1,29,207,4,0x0000FF;
	cutin "kafra_03",255;
	end;
}

//----------------------------------
// < w - 䪺d >
//----------------------------------

prontera.gat,29,207,6	script	d¾	113,{
	cutin "kafra_05",2;
	setarray '@code,2,3,4,5,6,7;
	setarray '@price,600,1200,1200,1200,1800,1700;
//	callfunc "KafraMain",1,0x7f,"prt_fild05.gat",368,205,"prontera.gat",33,207,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"prt_fild05.gat",368,205,"prontera.gat",33,207,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,146,89,1,0x0000FF;
	viewpoint 1,282,200,2,0x0000FF;
	viewpoint 1,151,29,3,0x0000FF;
	viewpoint 1,29,207,4,0x0000FF;
	cutin "kafra_05",255;
	end;
}

//----------------------------------
// < w - _䪺d >
//----------------------------------

prt_fild01.gat,198,47,0	script	d¾	112,{
	cutin "kafra_06",2;
	setarray '@code,2,3,4,5,6,7;
	setarray '@price,600,1200,1200,1200,1800,1700;
//	callfunc "KafraMain",1,0x5f,"prt_fild01.gat",198,51,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x5f+128),"prt_fild01.gat",198,51,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < w - aUDed >
//----------------------------------

prt_fild05.gat,290,224,4	script	d¾	114,{
	cutin "kafra_04",2;
//	callfunc "KafraMain",0,0x5b,"prt_fild05.gat",274,244,"NULL",0,0,30,800;
	callfunc "KafraMain",0,(0x5b+128),"prt_fild05.gat",274,244,"NULL",0,0,30,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < ̴|oq -  >
//----------------------------------

izlude.gat,134,88,4	script	d¾	115,{
	cutin "kafra_03",2;
	setarray '@code,5,4,3,8;
	setarray '@price,1200,1200,1200,1800;
//	callfunc "KafraMain",1,0x7f,"prt_fild08.gat",350,202,"izlude.gat",94,103,30,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"prt_fild08.gat",350,202,"izlude.gat",94,103,30,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,136,88,1,0x0000FF;
	cutin "kafra_03",255;
	end;
}

//----------------------------------
// < N - Qn >
//----------------------------------

geffen.gat,120,62,0	script	d¾	115,{
	cutin "kafra_03",2;
	setarray '@code,1,8,7,9;
	setarray '@price,1200,1200,1700,1700;
//	callfunc "KafraMain",0,0x7f,"geffen.gat",120,38,"NULL",0,0,30,800,'@code,'@price;
	callfunc "KafraMain",0,(0x7f+128),"geffen.gat",120,38,"NULL",0,0,30,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,120,62,1,0x0000FF;
	viewpoint 1,203,123,2,0x0000FF;
	cutin "kafra_03",255;
	end;
}

//----------------------------------
// < N - FJf >
//----------------------------------

geffen.gat,203,123,4	script	d¾	114,{
	cutin "kafra_04",2;
	setarray '@code,1,8,7,9;
	setarray '@price,1200,1200,1700,1700;
//	callfunc "KafraMain",0,0x7f,"gef_fild00.gat",55,222,"geffen.gat",120,38,30,800,'@code,'@price;
	callfunc "KafraMain",0,(0x7f+128),"gef_fild00.gat",55,222,"geffen.gat",120,38,30,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,120,62,1,0x0000FF;
	viewpoint 1,203,123,2,0x0000FF;
	cutin "kafra_04",255;
	end;
}

//----------------------------------
// < ùJ - n >
//----------------------------------

morocc.gat,156,97,4	script	d¾	113,{
	cutin "kafra_05",2;
	setarray '@code,1,4,6,10,11;
	setarray '@price,1200,1200,1800,1800,1200;
//	callfunc "KafraMain",1,0x7f,"morocc.gat",156,46,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"morocc.gat",156,46,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,160,258,1,0x0000FF;
	viewpoint 1,159,97,2,0x0000FF;
	cutin "kafra_05",255;
	end;
}

//----------------------------------
// < ùJ - _Jf >
//----------------------------------

morocc.gat,160,258,4	script	d¾	114,{
	cutin "kafra_04",2;
	setarray '@code,1,4,6,10,11;
	setarray '@price,1200,1200,1800,1800,1200;
//	callfunc "KafraMain",1,0x7f,"moc_fild07.gat",211,29,"morocc.gat",160,283,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"moc_fild07.gat",211,29,"morocc.gat",160,283,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,160,258,1,0x0000FF;
	viewpoint 1,159,97,2,0x0000FF;
	cutin "kafra_04",255;
	end;
}

//----------------------------------
// < ùJ - rJf >
//----------------------------------

moc_ruins.gat,59,157,6	script	d¾	117,{
	cutin "kafra_01",2;
//	callfunc "KafraMain",1,0x5a,0,0,0,0,0,0,50,800;
	callfunc "KafraMain",1,(0x5a+128),0,0,0,0,0,0,50,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < R - _Jf >
//----------------------------------

alberta.gat,28,229,0	script	d¾	116,{
	cutin "kafra_02",2;
	setarray '@code,4,1,5;
	setarray '@price,1200,1800,1800;
//	callfunc "KafraMain",1,0x7f,"pay_fild03.gat",387,76,"alberta.gat",31,231,50,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"pay_fild03.gat",387,76,"alberta.gat",31,231,50,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,28,229,1,0x0000FF;
	viewpoint 1,113,60,2,0x0000FF;
	cutin "kafra_02",255;
	end;
}

//----------------------------------
// < R - Qn >
//----------------------------------

alberta.gat,113,60,6	script	d¾#alberta2	112,{
	cutin "kafra_06",2;
	setarray '@code,4,1,5;
	setarray '@price,1200,1800,1800;
//	callfunc "KafraMain",1,0x7f,"alberta.gat",117,56,"NULL",0,0,50,800,'@code,'@price;
	callfunc "KafraMain",1,(0x7f+128),"alberta.gat",117,56,"NULL",0,0,50,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,28,229,1,0x0000FF;
	viewpoint 1,113,60,2,0x0000FF;
	cutin "kafra_06",255;
	end;
}

//----------------------------------
// < IS >
//----------------------------------

alb2trea.gat,59,69,6	script	d¾	117,{
	cutin "kafra_01",2;
//	callfunc "KafraMain",0,0x5a,0,0,0,0,0,0,50,800;
	callfunc "KafraMain",0,(0x5a+128),0,0,0,0,0,0,50,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// <  - _ >
//----------------------------------

payon.gat,175,226,4	script	d¾	116,{
	cutin "kafra_02",2;
	setarray '@code,6,1,5;
	setarray '@price,1200,1200,1200;
//	callfunc "KafraMain",1,0x5f,"payon.gat",207,113,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x5f+128),"payon.gat",207,113,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// <  - n >
//----------------------------------

payon.gat,181,104,4	script	d¾	113,{
	cutin "kafra_05",2;
	setarray '@code,6,1,5;
	setarray '@price,1200,1200,1200;
//	callfunc "KafraMain",1,0x5f,"payon.gat",160,58,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",1,(0x5f+128),"payon.gat",160,58,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// <  - } >
//----------------------------------

pay_arche.gat,55,123,4	script	d¾	114,{
	cutin "kafra_04",2;
//	callfunc "KafraMain",1,0x5b,"pay_arche.gat",50,145,"NULL",0,0,40,800;
	callfunc "KafraMain",1,(0x5b+128),"pay_arche.gat",50,145,"NULL",0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < 㺸 >
//----------------------------------

aldebaran.gat,143,119,4	script	d¾	113,{
	cutin "kafra_05",2;
	setarray '@code,3,13,2,9;
	setarray '@price,1200,1200,1800,1700;
//	callfunc "KafraMain",0,0x5f,"aldebaran.gat",167,112,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",0,(0x5f+128),"aldebaran.gat",167,112,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < J]q Ǥ >
//----------------------------------

cmd_in02.gat,146,180,4	script	d¾	721,{
	cutin "kafra_07",2;
	setarray '@code,5,12;
	setarray '@price,1800,1200;
//	callfunc "KafraMain",2,0x5f,"comodo.gat",209,143,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",2,(0x5f+128),"comodo.gat",209,143,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < J]qoִ Oq >
//----------------------------------

cmd_fild07.gat,136,134,4	script	d¾	721,{
	cutin "kafra_07",2;
	setarray '@code,10,5;
	setarray '@price,1200,1200;
//	callfunc "KafraMain",2,0x5f,"cmd_fild07.gat",127,134,"NULL",0,0,80,1000,'@code,'@price;
	callfunc "KafraMain",2,(0x5f+128),"cmd_fild07.gat",127,134,"NULL",0,0,80,1000,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < J]q > 
//----------------------------------

comodo.gat,195,150,4	script	d¾	721,{
	cutin "kafra_07",2;
	setarray '@code,5,12;
	setarray '@price,1800,1200;
//	callfunc "KafraMain",2,0x5f,"comodo.gat",180,151,"NULL",0,0,80,1000,'@code,'@price;
	callfunc "KafraMain",2,(0x5f+128),"comodo.gat",180,151,"NULL",0,0,80,1000,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < F ~He >
//----------------------------------

gef_fild10.gat,73,340,5	script	d¾	117,{
	cutin "kafra_01",2;
//	callfunc "KafraMain",0,0x5a,0,0,0,0,0,0,130,800;
	callfunc "KafraMain",0,(0x5a+128),0,0,0,0,0,0,130,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < ǥ oq}ޫe >
//----------------------------------

mjolnir_02.gat,82,362,4	script	d¾	117,{
	cutin "kafra_01",2;
//	callfunc "KafraMain",1,0x5a,0,0,0,0,0,0,100,800;
	callfunc "KafraMain",1,(0x5a+128),0,0,0,0,0,0,100,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < ׿ > nJf
//----------------------------------

yuno.gat,152,187,4	script	d¾	113,{
	cutin "kafra_05",2;
	set '@code,8;
	set '@price,1200;
//	callfunc "KafraMain",0,0x7f,"yuno.gat",158,124,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",0,(0x7f+128),"yuno.gat",158,124,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,327,109,2,0x0000FF;
	viewpoint 1,277,221,3,0x0000FF;
	cutin "kafra_05",255;
	end;
}

//----------------------------------
// < ׿ > Fn
//----------------------------------

yuno.gat,327,109,4	script	d¾	113,{
	cutin "kafra_05",2;
	set '@code,8;
	set '@price,1200;
//	callfunc "KafraMain",0,0x7f,"yuno.gat",327,100,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",0,(0x7f+128),"yuno.gat",327,100,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,152,187,1,0x0000FF;
	viewpoint 1,277,221,3,0x0000FF;
	cutin "kafra_05",255;
	end;
}

//----------------------------------
// < ׿ > F_
//----------------------------------

yuno.gat,277,221,4	script	d¾	113,{
	cutin "kafra_05",2;
	set '@code,8;
	set '@price,1200;
//	callfunc "KafraMain",0,0x7f,"yuno.gat",275,229,"NULL",0,0,40,800,'@code,'@price;
	callfunc "KafraMain",0,(0x7f+128),"yuno.gat",275,229,"NULL",0,0,40,800,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,152,187,1,0x0000FF;
	viewpoint 1,327,109,2,0x0000FF;
	cutin "kafra_05",255;
	end;
}

//----------------------------------
// < ᫰ >
//----------------------------------

amatsu.gat,102,149,5	script	d¾#amatsunomal	116,{
	cutin "kafra_02",2;
	mes "[d¾]";
	mes "wgiקFA";
	mes "ҥHNLӤFKK";
	mes "z]Oo򻷪a[ܡH";
	mes "ڤ]OSaӳo̪C";
	mes "o̪ŮܦnA]ܺ}GC";
	next;
	mes "[d¾]";
	mes "YϬOb~A";
	mes "ddAȷӼˬzAȡC";
	mes "iHܡH";
	next;
//	callfunc "KafraMain",3,0x5b,"amatsu.gat",116,94,"NULL",0,0,80,700;
	callfunc "KafraMain",3,(0x5b+128),"amatsu.gat",116,94,"NULL",0,0,80,700;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < X[ >
//----------------------------------

gonryun.gat,159,122,4	script	d¾	116,{
	cutin "kafra_02",2;
//	callfunc "KafraMain",1,0x5b,"gonryun.gat",160,62,"NULL",0,0,80,700;
	callfunc "KafraMain",1,(0x5b+128),"gonryun.gat",160,62,"NULL",0,0,80,700;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < Zک >
//----------------------------------

umbala.gat,87,160,5	script	d¾	721,{
	cutin "kafra_07",2;
	set '@code,10;
	set '@price,1800;
//	callfunc "KafraMain",0,0x57,"umbala.gat",100,154,"NULL",0,0,80,0,'@code,'@price;
	callfunc "KafraMain",0,(0x57+128),"umbala.gat",100,154,"NULL",0,0,80,0,'@code,'@price;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < ܵi >
//----------------------------------

niflheim.gat,202,180,3	script	d¾	791,{
	mes "[d¾]";
	mes "w{KK";
	mes "dԪAȡKK";
	mes "b̰a]@C";
	mes "ݭnAȶܡH";
	next;
	if(select("ܮwA","")==2) {
		percentheal 0,-25;
		mes "[d¾]";
		mes "ڭ̥dԪAȡKK ";
		mes "LצɦaKK ";
		mes "bȤHKKC";
		mes "KKҥHKK";
		mes "ФnѰOKK";
		close;
	}
	if(basicskillcheck() && getskilllv(1) < 6) {
		mes "[d¾]";
		mes "ܮwݭnKK򥻧ޯO6";
		mes "Ƿ|~iHϥΡKK";
		close;
	}
	else if(Zeny < 150) {
		percentheal -50,-50;
		mes "[d¾]";
		mes "ȤHAKKC";
		mes "ϥέܮwO 150 ZenyKK";
		mes "pGܡKKЧͩRڡKK";
		mes "ФKKڡKK";
		close;
	}
	set Zeny,Zeny-150;
	percentheal 0,-10;
	openstorage;
	close;
}

//----------------------------------
// < s >
//----------------------------------

louyang.gat,210,104,4	script	d¾	116,{
	cutin "kafra_02",2;
//	callfunc "KafraMain",1,0x5b,"louyang.gat",218,97,"NULL",0,0,80,700;
	callfunc "KafraMain",1,(0x5b+128),"louyang.gat",218,97,"NULL",0,0,80,700;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < u >
//----------------------------------

ayothaya.gat,212,169,6	script	d¾	116,{
	cutin "kafra_02",2;
//	callfunc "KafraMain",1,0x5b,"ayothaya.gat",217,187,"NULL",0,0,80,700;
	callfunc "KafraMain",1,(0x5b+128),"ayothaya.gat",217,187,"NULL",0,0,80,700;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < 㭵ùJ - s >
//----------------------------------

einbroch.gat,242,205,5	script	d¾#einbroch1	116,{
	cutin "kafra_02",2;
//	callfunc "KafraMain",4,0x7f,"einbroch.gat",239,197,"NULL",0,0,40,800;
	callfunc "KafraMain",4,(0x7f+128),"einbroch.gat",239,197,"NULL",0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,242,205,1,0x0000FF;
	viewpoint 1,59,203,2,0x0000FF;
	cutin "kafra_02",255;
	end;
}

//----------------------------------
// < 㭵ùJ -  >
//----------------------------------

einbroch.gat,59,203,5	script	d¾#einbroch2	117,{
	cutin "kafra_01",2;
//	callfunc "KafraMain",4,0x7f,"einbroch.gat",239,197,"NULL",0,0,40,800;
	callfunc "KafraMain",4,(0x7f+128),"einbroch.gat",239,197,"NULL",0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,242,205,1,0x0000FF;
	viewpoint 1,59,203,2,0x0000FF;
	cutin "kafra_01",255;
	end;
}

//----------------------------------
// < 㭵 >
//----------------------------------

einbech.gat,181,132,5	script	d¾	115,{
	cutin "kafra_03",2;
//	callfunc "KafraMain",4,0x7f,"einbech.gat",181,123,"NULL",0,0,40,850;
	callfunc "KafraMain",4,(0x7f+128),"einbech.gat",181,123,"NULL",0,0,40,850;	//=====Modify by FPE(2008.2.12)=====
	close2;
	viewpoint 1,181,132,1,0x0000FF;
	cutin "kafra_03",255;
	end;
}

//----------------------------------
// < ̧ƶ _ >
//----------------------------------

lighthalzen.gat,191,320,4	script	d¾	861,{
	cutin "kafra_09",2;
//	callfunc "KafraMain",4,0x5f,"lighthalzen.gat",194,313,"NULL",0,0,40,800;
	callfunc "KafraMain",4,(0x5f+128),"lighthalzen.gat",194,313,"NULL",0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < ̧ƶ n >
//----------------------------------

lighthalzen.gat,164,100,4	script	d¾	860,{
	cutin "kafra_08",2;
//	callfunc "KafraMain",4,0x5f,"lighthalzen.gat",158,96,"NULL",0,0,40,800;
	callfunc "KafraMain",4,(0x5f+128),"lighthalzen.gat",158,96,"NULL",0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// < ̧ƶ ] >
//----------------------------------

lhz_in02.gat,237,284,4	script	d¾	861,{
	cutin "kafra_09",2;
//	callfunc "KafraMain",4,0x5f,"lhz_in02.gat",278,214,"NULL",0,0,40,800;
	callfunc "KafraMain",4,(0x5f+128),"lhz_in02.gat",278,214,"NULL",0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}

//----------------------------------
// <  >
//----------------------------------

moscovia.gat,223,191,3	script	d¾	114,{
	cutin "kafra_04",2;
	callfunc "KafraMain",1,0x5b,"moscovia.gat",220,193,"NULL",0,0,80,700;
	end;
}

//----------------------------------
// < w - ¼Ch| >
//----------------------------------

prontera.gat,248,42,0	script	d¾#ProSword	116,{
	cutin "kafra_02",2;
	mes "[d¾]";
	mes "w{dԤqC";
	mes "pAݨ쪺A";
	mes "Ch|wgಾìPu̴|ovC";
	next;
	mes "[d¾]";
	mes "dԤqѱqwԨ̴|oǰeAȡC";
	mes "OάO 600 ZenyC";
	next;
	switch (select("ϥζǰeA","dIƲֿnT{","")) {
	case 1:
		if(Zeny<600) {
			mes "[d¾]";
			mes "z@C";
			break;
		}
		set Zeny,Zeny-600;
		set KAFRA_PIT,KAFRA_PIT+60;
		warp "izlude.gat",94,103;
		end;
	case 2:	//qfunctionƻs
		mes "[d¾]";
		mes strcharinfo(0)+ "A";
		mes "zIƤ@@" +KAFRA_PIT+ "IC";
		next;
		mes "[d¾]";
		mes "ҿIơA";
		mes "NOQΥdԪAȪǰeAȡA";
		mes "ӨϥΦƨӲֿnC";
		mes "ֿnIƥiHICӫ~C";
		mes "ֿnIƶVhAiIӫ~VhC";
		break;
	case 3:
		mes "[d¾]";
		mes "±zϥΡC";
		break;
	}
	close2;
	cutin "kafra_02",255;
	end;
}

//----------------------------------
// < ̴|o - u\q >
//----------------------------------

izlu2dun.gat,106,58,4	script	d¾#Byalan	116,{
	cutin "kafra_02",2;
//	callfunc "KafraMain",0,0x5a,0,0,0,0,0,0,40,800;
	callfunc "KafraMain",0,(0x5a+128),0,0,0,0,0,0,40,800;	//=====Modify by FPE(2008.2.12)=====
	end;
}
